<!DOCTYPE html>
<html lang="en">
<head>
<meta charset="utf-8">
<title>Cindy JS</title>

<script type="text/javascript" src="../../build/js/Cindy.js"></script>
<script type="text/javascript" src="../../build/js/Cindy3D.js"></script>

<link rel="stylesheet" href="../css/cindy.css">
</head>

<body style="font-family:Arial;">

<h1>A Fundamental Piece of the Discrete Conical Minimal Scherk Surface</h1>


<script id='mouseDrag' type='text/x-cindyscript'>
if((mover()!=S) & (mover()!=T),
   xx=mouse().x;
   yy=mouse().y;
   wy=(startx-xx)*.3;
   wx=-(starty-yy)*.3;

   mmmx=[
       [1,0,0],
       [0,cos(wx),sin(wx)],
       [0,-sin(wx),cos(wx)]
       ];


   mmmy=[
       [cos(wy),0,-sin(wy)],
       [0,1,0],
       [sin(wy),0,cos(wy)]
       ];



   mat=mmmx*mmmy*mat;

   startx=mouse().x;
   starty=mouse().y;
   );
</script>

<script id='mouseUp' type='text/x-cindyscript'>

if((mover()!=S) & (mover()!=T),
   xx=mouse().x;
   yy=mouse().y;
   wy=(startx-xx)*.3;
   wx=-(starty-yy)*.3;

   mmmx=[
       [1,0,0],
       [0,cos(wx),sin(wx)],
       [0,-sin(wx),cos(wx)]
       ];


   mmmy=[
       [cos(wy),0,-sin(wy)],
       [0,1,0],
       [sin(wy),0,cos(wy)]
       ];



   mat=mmmx*mmmy*mat;
   );
</script>

<script id='mouseDown' type='text/x-cindyscript'>

startx=mouse().x;
starty=mouse().y;
</script>




<script id='init' type='text/x-cindyscript'>
use("Cindy3D");
v=[
[0.06710554787359327,0.9905721936858389,-0.12519391772296426],
[-0.004938155724161591,0.9988790425913484,-0.08682189515702664],
[-0.04300943306947996,0.9982175789310915,-0.12372435824258683],
[-0.006671062871541823,0.991101281283667,-0.1762058620600052],
[0.00970510896140836,1.0049716381415272,-0.042028524624693246],
[0.057101298857496575,1.002847851797516,-0.04468966750071866],
[-0.04211656279914226,0.9991033440546696,-0.06019302946747819],
[-0.025317259251209687,1.0036964837055904,-0.030238516669591424],
[-0.069467706456152,0.9986391458143932,-0.08591165117646019],
[-0.06695577849778162,0.9944993124763515,-0.0385175624509454],
[-0.08918820912718925,0.9940031692486043,-0.05814368716840265],
[-0.05080167589843712,0.9987052736927853,-0.016070025455374427],
[-0.08511966989615888,0.9858210950281622,-0.01994061888530313],
[-0.06951239780903129,0.9901725448949034,-0.0014470472065448957],
[-0.10488190924316426,0.9851630374479786,-0.03647809653680798],
[-0.09881908578985521,0.973174360293457,-0.0034654810188978185],
[-0.11799856782016775,0.9722388004426153,-0.018834823174170068],
[-0.0829631559603207,0.9781675954481533,0.013201571487729633],
[-0.09174798948988104,0.9625478420272982,0.027982428302092997],
[-0.10896796443339041,0.9561928275942942,0.011623318176386324],
[-0.12933928513119114,0.9547780687283693,-0.004108021192302882],
[-0.11573074998696772,0.9339030340621323,0.026037583256013425],
[-0.13941919883635615,0.9315979850172067,0.008338544171666018],
[-0.09569764264556276,0.9429281324755907,0.043351139041307274],
[-0.11847917667795607,0.9042331668268808,0.0408751927198296],
[-0.09369885292715113,0.9187416411813291,0.06026658219848266],
[-0.14867606477257853,0.9002335160211153,0.018923002361547724],
[-0.11489353998855903,0.8622744112486307,0.05870737107423579],
[-0.1575971791975595,0.855857864456993,0.027935983223859127],
[-0.08298780674996442,0.8898132809885961,0.0806533402733719],
[-0.09523858496181159,0.7888816598151428,0.08967343503348009],
[-0.05807241788042474,0.8597601548889602,0.10774621224749151],
[-0.16640602708865615,0.7926522800237391,0.035208185655196664],
[-0.017469379216079182,0.8488702920432627,0.14006424552860092],
[-0.024071142834692236,0.7851110396058177,0.14413868441093458],
[-0.26582940541213357,0.8719732892277084,-0.03776148201870741],
[-0.2418739595996658,0.7975017189972419,-0.013026240749961455],
[-0.317341892111303,0.8023511579718717,-0.06126066715565537],
[-0.31074012849233756,0.8661104104106873,-0.06533510603835439],
[-0.20040730253596623,0.8673013953369256,-0.0011842867913851654],
[-0.22962318227503148,0.8984333402389033,-0.02204633613422737],
[-0.1791714410161654,0.9078010024425781,-0.001632120988863822],
[-0.20460419009832623,0.9252612860882322,-0.0174086868085903],
[-0.1638557531132398,0.9367320947737234,-0.007667941288664983],
[-0.18616394861771404,0.9482462551853399,-0.020009153910801797],
[-0.17154807949187262,0.9672389440603348,-0.027907519083153247],
[-0.1508774653906452,0.9586565058317359,-0.017729027208282185],
[-0.13883136981790273,0.9755265093611265,-0.03148906406960775],
[-0.15943586680119856,0.9826630952658822,-0.04035796442443474],
[-0.12702917156013308,0.9882847733163652,-0.049292964779407575],
[-0.1493124891263973,0.9948636470226299,-0.057336995540372984],
[-0.11508078314249144,0.9973283732973555,-0.07222308809055782],
[-0.1412679846608094,1.0040233966035699,-0.07943032041969045],
[-0.13622260106540926,1.0102161289469014,-0.10791378902485255],
[-0.10280882973750954,1.0026711798578043,-0.10270034505132153],
[-0.09045192260526926,1.0039060269922127,-0.14671355614795437],
[-0.1369302738053703,1.0135916979134914,-0.14472820625420918],
[-0.0795298349541647,0.9991922534598981,-0.22789359941205356],
[-0.15065569986197802,1.015060986942906,-0.19019736983394192],
[-0.1882559269368163,1.0182804101210827,-0.22744666133163902],
[-0.15238860703700813,1.0072832256361597,-0.27958133676426644],
[0.14088215861877765,0.9900431060880147,-0.07418197338586598],
[0.10501483871903333,1.0010402905729237,-0.022047297953428746],
[0.08002087508351174,1.0135260053036106,0.01468725633719365],
[0.04632713562732565,1.0146529073567903,-0.0018418107815822184],
[0.01197455196392927,1.014463174471641,-0.006364019171730944],
[0.03632341666792082,1.0279976195361125,0.02696537377473003],
[0.009148649979728085,1.0265562963904622,0.020485273098029177],
[0.0625579558543321,1.0274897958979443,0.04079299017027645],
[0.049874282908345724,1.0434486608765223,0.060242335813491366],
[0.027352271709199818,1.0434829182102259,0.047703390298524315],
[0.0039787360444681,1.0410797091675639,0.04046207321634589],
[0.01929608224362975,1.0615872529083432,0.06274915201167507],
[-0.0025968769335710518,1.0581084637526843,0.054828929928141854],
[0.040577491269190094,1.0619955244762935,0.07507308939467183],
[0.011893209308803419,1.0829718090122815,0.07309044264543305],
[0.03402039814358488,1.0839460917548702,0.08627776930583687],
[-0.010434931399509045,1.077898226313908,0.06413236647196244],
[0.0047062573814911565,1.1087610265964443,0.07888744110479207],
[-0.01995404005665564,1.1008967025724539,0.06827805117984721],
[0.029996967841886702,1.110664133191118,0.09426502243295672],
[0.02867602952097004,1.144682144908339,0.09900635734984573],
[-0.0031730249607711987,1.1410969556075194,0.07944792982180819],
[-0.03235210938236968,1.1276919518923991,0.06642974308883323],
[-0.014174537284009615,1.184916054197696,0.07236034180653123],
[-0.050380759467931586,1.158456002577244,0.05664519293974951],
[0.03073618600835662,1.1907789331693188,0.09993396713235228],
[-0.03812998712832302,1.2593876260635815,0.04762510675965498],
[0.03733794590888373,1.254538187071171,0.09585953368169459],
[-0.07959664060048482,1.1895879481033051,0.035783146146778265],
[-0.11359792016559966,1.2642370650558643,-0.0006093201622924503],
[-0.12240676433874151,1.201031479158772,0.0066628768367901735],
[-0.1313278760898991,1.1566558265420266,0.015675853792558012],
[-0.10083250000816903,1.1490883400449226,0.03623097643480978],
[-0.07539975060484062,1.1316280561153957,0.052007540717022446],
[-0.11614818636475319,1.1201572470044727,0.042266793794319926],
[-0.09383999119782067,1.1086430864827896,0.05460800526100274],
[-0.14058474003204866,1.1252913567605345,0.026260309068777004],
[-0.15066465210003258,1.1021112724049393,0.03870687204064013],
[-0.12912647283940956,1.098232835358759,0.052327877235802116],
[-0.10845585959061835,1.0896503971363103,0.0625063681209503],
[-0.14117256732162228,1.0813628312963959,0.06608791180061456],
[-0.12056807167117269,1.0742262454952103,0.07495681124563885],
[-0.16200536792758366,1.084650540106705,0.05343367185526632],
[-0.17512202502099042,1.0717263025173984,0.07107694305067036],
[-0.1529747645517481,1.0686045668131117,0.08389181017094666],
[-0.13069144883809314,1.0620256933109562,0.09193584007510477],
[-0.16492315193647766,1.0595609662611953,0.10682193085736151],
[-0.13873595291343674,1.0528659432852558,0.11402916240817013],
[-0.19081572349956186,1.0628861700722707,0.09274253129065739],
[-0.2105362241763131,1.0582501927214767,0.12051049238514219],
[-0.17719510426100832,1.0542181590278192,0.13729918455964193],
[-0.14378133633001508,1.0466732104616425,0.1425126279710069],
[-0.18955201027708896,1.0529833110180367,0.1813123910669702],
[-0.14307366390953374,1.0432976409883212,0.17932704137532443],
[-0.2369944948888726,1.0586717585522438,0.15832319554495747],
[-0.27333286136837204,1.0657880547361425,0.2108046939310827],
[-0.20047409694704107,1.0576970831320658,0.262492425894895],
[-0.12934823943279927,1.041828351546337,0.22479620024443303],
[-0.09174801634744026,1.0386089285071802,0.2620454878573306],
[-0.12761533252831347,1.0496061115284463,0.31418015785771264],
[-0.06675405538624377,1.0261232148291128,0.22531093747285402],
[-0.09375258010622645,1.0285641484671753,0.19933269159186745],
[-0.10961306959806288,1.0317056909270939,0.16868694622005867],
[-0.07118160148185877,1.0144806620928317,0.17932729913921713],
[-0.08634813730259863,1.018411047346546,0.15615263256332418],
[-0.049291138151588226,1.0121594250197512,0.1992052065531667],
[-0.036607466843010084,0.9962005606855531,0.17975586330166854],
[-0.05599495560210247,0.9986299815322373,0.16294246425323664],
[-0.07051200813008093,1.003260614364168,0.1436461803241553],
[-0.04604155029797979,0.980414118197299,0.14922546717041746],
[-0.06060901660113571,0.9860362579992472,0.13160973730201614],
[-0.02731067668743908,0.9776536976696854,0.16492511188765632],
[-0.02075358504540451,0.955703130974904,0.15372043414368974],
[-0.04053589602652222,0.9591410918420491,0.13755541603265103],
[-0.0560983431195187,0.9664420981756112,0.11997589062309447],
[-0.03956444811273214,0.9337172573612461,0.12740524045273507],
[-0.0572454522977026,0.9440706431448365,0.10835986183122678],
[-0.01673015638126564,0.9289850901832857,0.14573318340827945],
[-0.015409220054859566,0.8949670792513936,0.1409918514046678],
[-0.044252429144862215,0.9021201040052925,0.11804296504971654],
[-0.06528641620251381,0.9184769166357691,0.09589319557345695],
[-0.2768309154382983,0.9157923868590294,-0.044849073761996136],
[-0.30867996933065267,0.9122071976194218,-0.06440750016223892],
[-0.24765183105362085,0.9291973903024093,-0.031830888918104275],
[-0.2847101961297252,0.9481283151574994,-0.044288587882851435],
[-0.26004989931968864,0.9559926390812595,-0.03367919939865176],
[-0.31000090565713617,0.9462252085515402,-0.05966616815881309],
[-0.291897146741005,0.973917532151514,-0.038491591834736855],
[-0.3140243343216559,0.9729432493431026,-0.05167891742375987],
[-0.26956900712362525,0.9789911148641711,-0.02953351688516872],
[-0.29930001853525295,0.995302087720884,-0.028150303448307865],
[-0.27740706088739275,0.9987808769868487,-0.020230082467521088],
[-0.32058142596385225,0.9948938160378294,-0.040474239679783815],
[-0.30735620693253735,1.0134064218895957,-0.013104544034732506],
[-0.3298782161195696,1.0134406790536394,-0.0256434882659227],
[-0.2839826732806959,1.0158096311418368,-0.005863227966682932],
[-0.31632735082220736,1.028891719991578,0.0076334698999451864],
[-0.28915258675648636,1.0303330434718172,0.014113569673531931],
[-0.34256188742826155,1.0293995433878167,-0.006194145014495039],
[-0.32633106866623657,1.0422364314968702,0.03644065123219219],
[-0.36002480466300946,1.0433633331971335,0.019911585905131847],
[-0.29197848849553665,1.0424261649082471,0.04096285896647247],
[-0.3371052307424408,1.0540414861796439,0.0792885033997],
[-0.2897090457463052,1.0519177007295262,0.07662736066045348],
[-0.3850187656239316,1.0558490468753707,0.056646136290212264],
[-0.34710947872366227,1.0663171428709075,0.15979274523794829],
[-0.4208860818047965,1.0668462298966341,0.10878080629058215],
[-0.2750657825739468,1.0580102958644204,0.12142072654541802],
[-0.27333287564193764,1.0657880558456458,0.21080468418614762],
[-0.2369945091627796,1.058671759661814,0.15832318580051538],
[-0.23788737934518944,1.0577859954788593,0.0947918635150775],
[-0.21053623845090266,1.058250193830866,0.12051048264036168],
[-0.25468668117205745,1.0531928559646178,0.06483735372807932],
[-0.21304816627581907,1.0623900278440912,0.07311639865779924],
[-0.22920226726613052,1.0581840666460463,0.0506688637353097],
[-0.19081573777440208,1.0628861711815973,0.09274252154561491],
[-0.19488427693733634,1.0710682459385144,0.054539456984467924],
[-0.175122039295894,1.07172630362669,0.07107693330555905],
[-0.2104915475634987,1.0667167960216353,0.036045886734925175],
[-0.1811848628410038,1.083714981256905,0.038064320905068394],
[-0.19704079133777258,1.078721745998561,0.021397269308620223],
[-0.16200538220247615,1.0846505412160048,0.05343366211010866],
[-0.17103598593152688,1.1006965145349974,0.022975523539818413],
[-0.1506646663748764,1.1021112735142742,0.03870686229558931],
[-0.18825595963131292,1.0943414999417447,0.006616413832209407],
[-0.16427320222215977,1.12298630869677,0.008561260499989148],
[-0.18430630834050443,1.1139612100446439,-0.008752295423922191],
[-0.14058475430680664,1.1252913578698807,0.02626029932368514],
[-0.16152477769263937,1.152656176682929,-0.006276346485026809],
[-0.13132789036464582,1.156655827651195,0.015675844047560117],
[-0.18630510008958545,1.1381477019525248,-0.025667736874247518],
[-0.16511041723146216,1.1946149332614606,-0.024108521499888586],
[-0.197016148545689,1.1670760628392751,-0.04605449299758731],
[-0.12240677861341134,1.2010314802678073,0.006662867092024651],
[-0.1135979344403283,1.26423706616465,-0.0006093299070709102],
[-0.1847653770937524,1.268007686391517,-0.055074579801653756],
[-0.22193153978036317,1.1971291896362175,-0.07314736310483447],
[-0.2625345796476625,1.20801905271698,-0.10546539624566109],
[-0.2559328197471431,1.271778306618758,-0.10953982969631405],
[-0.23575152585109577,1.1547692395251017,-0.08344411942791434],
[-0.2645947361349918,1.161922264456252,-0.10639300602813777],
[-0.2147175370812182,1.1384124265069933,-0.06129435051123511],
[-0.24043950482475693,1.1231720854219378,-0.09280639741112247],
[-0.22275849912640014,1.112818699390011,-0.0737610186438167],
[-0.26327379781405097,1.1279042527391685,-0.11113434094503541],
[-0.2592503675123301,1.1011862113029947,-0.1191215940721661],
[-0.23946805513452346,1.0977482503143103,-0.10295657509734216],
[-0.22390560655959524,1.0904472438122352,-0.08537704903650926],
[-0.23396239917897033,1.0764752233818724,-0.11462662811424496],
[-0.2193949313467993,1.0708530834693746,-0.09701089714384968],
[-0.2526932743867239,1.079235644024433,-0.13032627398339708],
[-0.22400899211834224,1.058259359464435,-0.12834362702400548],
[-0.24339648274751374,1.0606887804246563,-0.14515702756459029],
[-0.20949193796922536,1.0536287265768451,-0.10904734150972425],
[-0.2088223442151698,1.0424086782588793,-0.14472846383821103],
[-0.19365580665829554,1.0384782930191847,-0.12155379506584954],
[-0.2307128098014145,1.0447299154460408,-0.164606373207821],
[-0.1862513629969891,1.0283251910986095,-0.1647338584846236],
[-0.21324989057230226,1.0307661248517461,-0.19071210704096386],
[-0.17039087168881592,1.0251836487720067,-0.13408811001002868],
[-0.017551923754877664,1.011809323276386,-0.0025368085361488074],
[-0.01580824865009215,1.0228154694114153,0.02050781879940185],
[-0.04105673908219762,1.0062621655168795,0.005947482897376587],
[-0.03685352350773569,1.0166513125889824,0.025428572130682208],
[-0.05890190863807582,0.9978224838034485,0.017022166939260692],
[-0.05334626935699201,1.0081771094590168,0.033891430352577245],
[-0.07154690912042075,0.9866003597460373,0.029742797844084127],
[-0.06505101233766171,0.9976293814528836,0.045003469731273234],
[-0.0717463321270596,0.9853175304020296,0.05824446673082334],
[-0.07912126799711616,0.9727026758840662,0.04378309761267153],
[-0.08129286046695483,0.9562742495389221,0.059201200400664504],
[-0.07305095714113304,0.9716809174993274,0.07333696382080955],
[-0.0771704316902235,0.9377414250000755,0.07637008036759023],
[-0.06840359716422366,0.9574728926443273,0.09011934329769508],
[-0.16418730644059742,1.020429383045572,-0.10523649008601074],
[-0.18551828887158756,1.0327919884750034,-0.09835276427654094],
[-0.16461746413671322,1.013525765988529,-0.08059129703275875],
[-0.1834889060848253,1.0252713723545313,-0.07727110931258095],
[-0.16962094933377325,1.0043311772024919,-0.06052262482249253],
[-0.1865043458810383,1.016004896701856,-0.05936908969796253],
[-0.1781479635195426,0.9928669745368331,-0.044917861342218895],
[-0.1937885499646899,1.0051973043274565,-0.04516101761684792],
[-0.1898403069202135,0.979211369155502,-0.033761692870786654],
[-0.20490440657641854,0.9931453174954282,-0.03501605182361782],
[-0.20485358181669852,0.9635378497437632,-0.027337576857785113],
[-0.21968633543278895,0.9803009769561973,-0.029362714532134997],
[-0.22380580839746464,0.946361484338783,-0.026329596871150544],
[-0.238113630621551,0.9674494112208493,-0.028741234900596057],
[-0.2006111588254503,1.0470279385392771,-0.08930456358571635],
[-0.2099583186340669,1.0629760472779393,-0.079012091026262],
[-0.19731552544988926,1.0387628382526575,-0.07077128624313778],
[-0.20594371467723085,1.0535622053835503,-0.061924474427114046],
[-0.19916377244885183,1.02920356120386,-0.054560369504176705],
[-0.20718560298507466,1.0432914119101606,-0.04670475382701531],
[-0.20564961547942356,1.0187550979509425,-0.041396348248435494],
[-0.2133196625935486,1.0327547004299145,-0.03405041868211606],
[-0.21634090394269997,1.0078633049734755,-0.03182591520986912],
[-0.22393587099879916,1.0224814750828486,-0.024535266221094747],
[-0.2308737227160813,0.9970713293647843,-0.02635599454625771],
[-0.23859345313787372,1.012999332199051,-0.018711555364596292],
[-0.24883781046902562,0.9871128641295441,-0.02547512713901003],
[-0.2567153312774462,1.0048867983006957,-0.01712776615471937],
[-0.2137178550288042,1.0805079032799603,-0.06778059676532239],
[-0.21160035263763186,1.099416449584561,-0.055520500223431746],
[-0.20924290791637487,1.0692303441772855,-0.05118400239361537],
[-0.20695299103158138,1.085208424406842,-0.038738120965523634],
[-0.2102984215614606,1.0576460960112815,-0.03627492169098648],
[-0.20825761443360177,1.0715718111818775,-0.023645624111347588],
[-0.21650756091081275,1.0464908167758122,-0.023565306431861464],
[-0.2149529325941283,1.0592599598099448,-0.010404627319560605],
[-0.22747555242102074,1.0363058395312015,-0.013540468323327857],
[-0.22665767386036795,1.0487122314761053,0.0007074119097655041],
[-0.2428011039139716,1.0275388347901016,-0.006768712550004464],
[-0.2431504178245362,1.0402380280027643,0.009170270082496126],
[-0.2619445047870588,1.0205928281281587,-0.003951163072886501],
[-0.26419569054619,1.0340738708183725,0.014091023540886158],
[-0.20283351973674665,1.119147917681857,-0.041771236185639646],
[-0.19871108913863028,1.100615092683455,-0.024602357133709632],
[-0.20088267984045452,1.0841866658973465,-0.009184255198151966],
[-0.2084570369421547,1.0702889816046857,0.004856043795676279],
[-0.22110203554154242,1.0590668571082222,0.01757667399943],
[-0.2389472029771634,1.0506271749265796,0.028651357429681952],
[-0.262452015797592,1.0450800166543797,0.03713564841628934],
[-0.018059434343183675,1.0362965124065324,0.03855000756218835],
[-0.023288607961079417,1.0520025425405373,0.05172661259301757],
[-0.037202836941511844,1.0293505059686203,0.041367556473192846],
[-0.041410487398746004,1.043890008735534,0.05331040086690925],
[-0.052528390002861546,1.0205835014428932,0.048139311810257386],
[-0.0560680707385397,1.0344078659382248,0.05913411085748107],
[-0.06349638297450413,1.010398524405682,0.05816414955787345],
[-0.06668428029149168,1.024134640673835,0.06864926249092228],
[-0.07281834104757075,1.0135979292763317,0.08130359680827098],
[-0.06970552373884263,0.9992432453740604,0.0708737644877478],
[-0.07076103880625026,0.9876589974121639,0.08578284485403384],
[-0.07406023055599606,1.0033271358895426,0.09652331654272552],
[-0.06628609315495824,0.9763814385130927,0.10237943883991422],
[-0.07004562789641504,0.9939132940885158,0.11361093220639494],
[-0.031166129001605883,1.0697764770272409,0.06007397543708387],
[-0.04189030918723119,1.089439930270185,0.06334008505654437],
[-0.04913021759978911,1.0598180117527678,0.06095484155697063],
[-0.06031760471953681,1.0765883643510936,0.06396156302724265],
[-0.06366303716129429,1.0490260360984476,0.06642476095737997],
[-0.07509953390164271,1.0637440236276574,0.06961489867506317],
[-0.07435432640534295,1.0381342430751128,0.0759951927400609],
[-0.08621539087368231,1.0516920366173605,0.0797598628228387],
[-0.09349959540305341,1.040884444071383,0.09396793320015967],
[-0.08084017026294829,1.0276857797799603,0.08915921270830335],
[-0.08268841819585065,1.0181265026970163,0.10537012808469716],
[-0.09651503579780543,1.0316179682558828,0.11186995098513526],
[-0.07939278592795342,1.0098614023917352,0.1239034039607339],
[-0.09448565385981923,1.0240973519911594,0.13295160394331362],
[-0.05619813184091686,1.1105278575078845,0.060928448920693226],
[-0.07515035818932826,1.093351491753729,0.061936426820329155],
[-0.09016363289781025,1.0776779720128573,0.06836054082803754],
[-0.10185597618817474,1.0640223663200858,0.07951670732012814],
[-0.11038299037145305,1.0525581633514483,0.09512146874743556],
[-0.11538647573253064,1.043363574263838,0.11519013871231931],
[-0.11581663388009598,1.036459956910874,0.13983532921166805]];



f = [[1,2,3,4],[5,2,1,6],[7,2,5,8],[3,2,7,9],[9,7,10,11],[8,12,10,7],[13,10,12,14],[11,10,13,15],[15,13,16,17],[14,18,16,13],[19,20,16,18],[17,16,20,21],[21,20,22,23],[24,22,20,19],[25,22,24,26],[23,22,25,27],[27,25,28,29],[26,30,28,25],[31,28,30,32],[29,28,31,33],[32,34,35,31],[36,37,38,39],[29,33,37,40],[41,40,37,36],[42,40,41,43],[27,29,40,42],[42,44,23,27],[43,45,44,42],[46,47,44,45],[21,23,44,47],[47,48,17,21],[49,48,47,46],[50,48,49,51],[15,17,48,50],[50,52,11,15],[51,53,52,50],[54,55,52,53],[9,11,52,55],[55,56,3,9],[57,56,55,54],[58,56,57,59],[3,56,58,4],[59,60,61,58],[6,1,62,63],[64,65,6,63],[5,6,65,66],[66,65,67,68],[69,67,65,64],[70,71,67,69],[68,67,71,72],[72,71,73,74],[75,73,71,70],[76,73,75,77],[74,73,76,78],[78,76,79,80],[77,81,79,76],[82,83,79,81],[80,79,83,84],[84,83,85,86],[87,85,83,82],[88,85,87,89],[86,85,88,90],[91,92,90,88],[93,94,90,92],[86,90,94,95],[95,94,96,97],[98,96,94,93],[99,100,96,98],[97,96,100,101],[101,100,102,103],[104,102,100,99],[105,106,102,104],[107,103,102,106],[106,108,109,107],[110,108,106,105],[111,112,108,110],[109,108,112,113],[113,112,114,115],[116,114,112,111],[117,118,114,116],[115,114,118,119],[120,119,118,121],[122,123,119,120],[124,115,119,123],[123,125,126,124],[127,125,123,122],[128,129,125,127],[130,126,125,129],[129,131,132,130],[133,131,129,128],[134,135,131,133],[136,132,131,135],[135,137,138,136],[139,137,135,134],[140,141,137,139],[142,138,137,141],[141,32,30,142],[34,32,141,140],[143,36,39,144],[145,41,36,143],[143,146,147,145],[144,148,146,143],[149,146,148,150],[151,147,146,149],[149,152,153,151],[150,154,152,149],[155,152,154,156],[157,153,152,155],[155,158,159,157],[156,160,158,155],[161,158,160,162],[163,159,158,161],[161,164,165,163],[162,166,164,161],[167,164,166,168],[165,164,167,169],[170,171,169,167],[172,169,171,173],[165,169,172,174],[174,172,175,176],[173,177,175,172],[178,175,177,179],[180,176,175,178],[178,181,182,180],[179,183,181,178],[184,181,183,185],[182,181,184,186],[186,184,187,188],[185,189,187,184],[190,187,189,191],[192,188,187,190],[190,193,194,192],[191,195,193,190],[196,197,193,195],[194,193,197,198],[199,198,197,200],[201,198,199,202],[194,198,201,203],[203,201,204,205],[202,206,204,201],[207,208,204,206],[205,204,208,209],[209,208,210,211],[212,210,208,207],[213,210,212,214],[211,210,213,215],[215,213,216,217],[214,218,216,213],[219,216,218,220],[217,216,219,221],[221,219,59,57],[220,60,59,219],[222,66,68,223],[5,66,222,8],[8,222,224,12],[223,225,224,222],[226,224,225,227],[12,224,226,14],[14,226,228,18],[227,229,228,226],[230,231,228,229],[19,18,228,231],[231,232,24,19],[233,232,231,230],[234,232,233,235],[24,232,234,26],[26,234,142,30],[235,138,142,234],[236,221,57,54],[217,221,236,237],[237,236,238,239],[54,53,238,236],[51,240,238,53],[241,239,238,240],[240,242,243,241],[49,242,240,51],[244,242,49,46],[243,242,244,245],[245,244,246,247],[46,45,246,244],[43,248,246,45],[249,247,246,248],[248,145,147,249],[41,145,248,43],[250,215,217,237],[211,215,250,251],[251,250,252,253],[237,239,252,250],[241,254,252,239],[255,253,252,254],[254,256,257,255],[243,256,254,241],[258,256,243,245],[257,256,258,259],[259,258,260,261],[245,247,260,258],[249,262,260,247],[263,261,260,262],[262,151,153,263],[147,151,262,249],[264,209,211,251],[205,209,264,265],[265,264,266,267],[251,253,266,264],[255,268,266,253],[269,267,266,268],[268,270,271,269],[257,270,268,255],[272,270,257,259],[271,270,272,273],[273,272,274,275],[259,261,274,272],[263,276,274,261],[277,275,274,276],[276,157,159,277],[153,157,276,263],[278,203,205,265],[194,203,278,192],[192,278,279,188],[265,267,279,278],[269,280,279,267],[186,188,279,280],[280,281,182,186],[271,281,280,269],[282,281,271,273],[182,281,282,180],[180,282,283,176],[273,275,283,282],[277,284,283,275],[174,176,283,284],[284,163,165,174],[159,163,284,277],[285,72,74,286],[68,72,285,223],[223,285,287,225],[286,288,287,285],[289,287,288,290],[225,287,289,227],[227,289,291,229],[290,292,291,289],[293,294,291,292],[230,229,291,294],[294,295,233,230],[296,295,294,293],[297,295,296,298],[233,295,297,235],[235,297,136,138],[298,132,136,297],[299,78,80,300],[74,78,299,286],[286,299,301,288],[300,302,301,299],[303,301,302,304],[288,301,303,290],[290,303,305,292],[304,306,305,303],[307,308,305,306],[293,292,305,308],[308,309,296,293],[310,309,308,307],[311,309,310,312],[296,309,311,298],[298,311,130,132],[312,126,130,311],[313,84,86,95],[80,84,313,300],[300,313,314,302],[95,97,314,313],[315,314,97,101],[302,314,315,304],[304,315,316,306],[101,103,316,315],[107,317,316,103],[307,306,316,317],[317,318,310,307],[109,318,317,107],[319,318,109,113],[310,318,319,312],[312,319,124,126],[113,115,124,319]] ;

mid=sum(v)/length(v);
v=apply(v,(#-mid)*6);


mat=[
    [1,0,0],
    [0,1,0],
    [0,0,1]
    ];
mat=[[0.56,0.49,-0.67],[-0.52,-0.42,-0.74],[-0.65,0.76,0.02]];
mat0=[
    [1,0,0],
    [0,1,0],
    [0,0,1]
    ];



mmmx=mat0;
mmmy=mat0;




</script>


<script id='tick' type='text/x-cindyscript'>

</script>



<script id='csmove' type='text/x-cindyscript'>
begin3d();
background3d([0,0,.3]);
size3d(.2);




vv=apply(v,mat*#);


color3d((1,1,1));
apply(f,q,
      pol=apply(q,vv_#);
      poly3d(pol);

      pol1=pol++[pol_1];
      forall(1..4,draw3d(pol1_#,pol1_(#+1)));
mesh3d(2,2,[pol_1,pol_2,pol_4,pol_3],normaltype->"pervertex",color->(.5,.5,1));

      );
end3d();


</script>

<div  id="CSCanvas" style="width:8px; height:6px; border:none"></div>
  <canvas id="Cindy3D" style="border:2px solid #000000" width="800" height="600"></canvas>

<script type="text/javascript">

var gslp=[
    ];

CindyJS({canvasname:"CSCanvas",
movescript:"csmove",
initscript:"init",
geometry:gslp});


</script>

</body>
</html>
